projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
626f67f
)
(rmail-insert-inbox-text): If inbox is not in the
author
Richard M. Stallman
<rms@gnu.org>
Tue, 13 Jul 1993 05:52:32 +0000
(
05:52
+0000)
committer
Richard M. Stallman
<rms@gnu.org>
Tue, 13 Jul 1993 05:52:32 +0000
(
05:52
+0000)
spool dir, try copying before renaming.
lisp/mail/rmail.el
patch
|
blob
|
history
diff --git
a/lisp/mail/rmail.el
b/lisp/mail/rmail.el
index ad99396a45cded5e6e43879056fa898c735ed405..a4ee62c3ad67e02ecb9a8c92c80801117caef284 100644
(file)
--- a/
lisp/mail/rmail.el
+++ b/
lisp/mail/rmail.el
@@
-753,7
+753,12
@@
argument causes us to read a file name and use that file as the inbox."
(not (file-exists-p file))))
nil)
((and (not movemail) (not popmail))
- (rename-file file tofile nil)
+ ;; Try copying. If that fails (perhaps no space),
+ ;; rename instead.
+ (condition-case nil
+ (copy-file file tofile nil)
+ (error
+ (rename-file file tofile nil)))
;; Make the real inbox file empty.
;; Leaving it deleted could cause lossage
;; because mailers often won't create the file.